User-Surname names an undocumented function, with lambda list (&OPTIONAL (PERSON *USER*)).
Defined in file src/users.lisp.